home *** CD-ROM | disk | FTP | other *** search
/ Tech Arsenal 1 / Tech Arsenal (Arsenal Computer).ISO / tek-01 / asmflo25.zip / QDEMO.ZIP / DEMO1.FLO < prev    next >
Text File  |  1990-12-01  |  9KB  |  232 lines
  1.  
  2.      win_title proc
  3.      push   bx
  4.      push   si
  5.      push   dx
  6.      xor    cx, cx
  7.      mov    cl, dl
  8.      mov    al, 1
  9.      mov    dl, ' '
  10.      call   scr_fill_screen
  11.      pop    dx
  12.      test   [si].win_features, 40h
  13.      mov    si, di
  14.      jz     wp_7           ─────────┐
  15.      mov    cx, ax                  │
  16.      call   str_len                 │
  17.      cmp    al, dl                  │
  18.      jg     wp_6a          ─────┐   │
  19.      mov    ah, dl              │   │
  20.      sub    ah, al              │   │
  21.      shr    ah, 1               │   │
  22.      add    bl, ah              │   │
  23.  wp_6a:                    ────┘   │
  24.      mov    ah, ch                  │
  25.  wp_7:                     ────────┘
  26.      xor    cx, cx
  27.      mov    al, 1
  28.      call   scr_display_string
  29.      pop    si
  30.      pop    bx
  31.      ret
  32.      win_title endp
  33.  
  34.  
  35.  ┌────────────────────────────────┐
  36.  │   win_title proc               │
  37.  └───────────────┬────────────────┘
  38.  ┌───────────────┴────────────────┐
  39.  │   push   bx                    │
  40.  │   push   si                    │
  41.  │   push   dx                    │
  42.  └───────────────┬────────────────┘
  43.  ┌───────────────┴────────────────┐
  44.  │   xor    cx, cx                │
  45.  │   mov    cl, dl                │
  46.  │   mov    al, 1                 │
  47.  │   mov    dl, ' '               │
  48.  │   call   scr_fill_screen       │
  49.  └───────────────┬────────────────┘
  50.  ┌───────────────┴────────────────┐
  51.  │   pop    dx                    │
  52.  └───────────────┬────────────────┘
  53.  ┌───────────────┴────────────────┐
  54.  │   test   [si].win_features, 40h│
  55.  └───────────────┬────────────────┘
  56.  ┌───────────────┴────────────────┐
  57.  │   mov    si, di                │
  58.  └───────────────┬────────────────┘
  59.                  
  60.               /     \  wp_7
  61.                 jz   ─────────────────────┐
  62.               \     /                       │
  63.                                            │
  64.  ┌───────────────┴────────────────┐         │
  65.  │   mov    cx, ax                │         │
  66.  │   call   str_len               │         │
  67.  └───────────────┬────────────────┘         │
  68.  ┌───────────────┴────────────────┐         │
  69.  │   cmp    al, dl                │         │
  70.  └───────────────┬────────────────┘         │
  71.                                            │
  72.               /     \  wp_6a                │
  73.                 jg   ─────────────────┐   │
  74.               \     /                   │   │
  75.                                        │   │
  76.  ┌───────────────┴────────────────┐     │   │
  77.  │   mov    ah, dl                │     │   │
  78.  │   sub    ah, al                │     │   │
  79.  │   shr    ah, 1                 │     │   │
  80.  │   add    bl, ah                │     │   │
  81.  └───────────────┬────────────────┘     │   │
  82.  wp_6a:          │                      │   │
  83.  ┌───────────────┴────────────────┐     │   │
  84.  │   mov    ah, ch                │────┘   │
  85.  └───────────────┬────────────────┘         │
  86.  wp_7:           │                          │
  87.  ┌───────────────┴────────────────┐         │
  88.  │   xor    cx, cx                │────────┘
  89.  │   mov    al, 1                 │
  90.  │   call   scr_display_string    │
  91.  └───────────────┬────────────────┘
  92.  ┌───────────────┴────────────────┐
  93.  │   pop    si                    │
  94.  │   pop    bx                    │
  95.  └───────────────┬────────────────┘
  96.  ┌───────────────┴────────────────┐
  97.  │   ret                          │
  98.  └────────────────────────────────┘
  99.  ┌────────────────────────────────┐
  100.  │   win_title endp               │
  101.  └────────────────────────────────┘
  102.  
  103.  
  104. win_popup
  105.  ├─ win_push_window
  106.  │   ├─ win_check_coordinates
  107.  │   ├─ win_calc_size
  108.  │   ├─ cur_get_pos_type
  109.  │   └─ win_save_window
  110.  │       ├─ scr_video_segment_ds
  111.  │       ├─ win_setup_screen_loc
  112.  │       ├─ scr_cmp_video_wait
  113.  │       ├─ save_window_line_ega
  114.  │       └─ save_window_line_cga
  115.  ├─ scr_cmp_video_mono
  116.  ├─ win_box
  117.  │   ├─ draw_box
  118.  │   ├─ draw_htbar
  119.  │   └─ win_shadow
  120.  │       ├─ scr_video_segment_es
  121.  │       ├─ scr_offset
  122.  │       ├─ drw_hline
  123.  │       ├─ scr_change_foreground
  124.  │       ├─ drw_vline
  125.  │       └─ drw_vline
  126.  ├─ win_title
  127.  │   ├─ scr_fill_screen
  128.  │   ├─ str_len
  129.  │   └─ scr_display_string
  130.  └─ win_display_area
  131.      ├─ win_get_attr
  132.      │   └─ scr_cmp_video_mono
  133.      ├─ win_fill_window
  134.      │   ├─ scr_video_segment_es
  135.      │   ├─ win_setup_screen_loc
  136.      │   ├─ scr_cmp_video_wait
  137.      │   ├─ fill_window_line_ega
  138.      │   └─ fill_window_line_cga
  139.      └─ win_display_window
  140.          ├─ win_xfer_and_clip
  141.          │   ├─ xfer_win_buf
  142.          │   └─ xfer_win_buf_attr
  143.          │       ├─ scr_cmp_video_mono
  144.          │       └─ scr_attr_from_index
  145.          └─ win_restore_window
  146.              ├─ scr_video_segment_es
  147.              ├─ win_setup_screen_loc
  148.              ├─ scr_cmp_video_wait
  149.              ├─ restore_window_line_ega
  150.              └─ restore_window_line_cga
  151.  
  152. ┌──────────────────────────────────────────────┐
  153. │ win_popup                                22  │
  154. │  88: 872 cy / 872 cy  174 µsec / 174 µsec    │
  155. │ 286: 470 cy / 470 cy   47 µsec /  47 µsec    │
  156. │ 386: 286 cy / 286 cy   14 µsec /  14 µsec    │
  157. └┬─────────────────────────────────────────────┘
  158.  │ ┌──────────────────────────────────────────────┐
  159.  ├─┤ win_push_window                           38 │
  160.  │ │  (dup)                                       │
  161.  │ └──────────────────────────────────────────────┘
  162.  │ ┌──────────────────────────────────────────────┐
  163.  ├─┤ scr_cmp_video_mono                        22 │
  164.  │ │  (Ext)                                       │
  165.  │ └──────────────────────────────────────────────┘
  166.  │ ┌──────────────────────────────────────────────┐
  167.  ├─┤ win_box                                   40 │
  168.  │ │  88: 309 cy / 309 cy   61 µsec /  61 µsec    │
  169.  │ │ 286: 152 cy / 152 cy   15 µsec /  15 µsec    │
  170.  │ │ 386: 124 cy / 124 cy 6200 nsec /6200 nsec    │
  171.  │ └─┬────────────────────────────────────────────┘
  172.  │   │ ┌──────────────────────────────────────────────┐
  173.  │   ├─┤ draw_box                                  40 │
  174.  │   │ │  (Ext)                                       │
  175.  │   │ └──────────────────────────────────────────────┘
  176.  │   │ ┌──────────────────────────────────────────────┐
  177.  │   ├─┤ draw_htbar                                40 │
  178.  │   │ │  (Ext)                                       │
  179.  │   │ └──────────────────────────────────────────────┘
  180.  │   │ ┌──────────────────────────────────────────────┐
  181.  │   └─┤ win_shadow                                68 │
  182.  │     │  88: 591 cy / 661 cy  118 µsec / 132 µsec    │
  183.  │     │ 286: 248 cy / 259 cy   24 µsec /  25 µsec    │
  184.  │     │ 386: 209 cy / 241 cy   10 µsec /  12 µsec    │
  185.  │     └─┬────────────────────────────────────────────┘
  186.  │       │ ┌──────────────────────────────────────────────┐
  187.  │       ├─┤ scr_video_segment_es                      68 │
  188.  │       │ │  (Ext)                                       │
  189.  │       │ └──────────────────────────────────────────────┘
  190.  │       │ ┌──────────────────────────────────────────────┐
  191.  │       ├─┤ scr_offset                                68 │
  192.  │       │ │  (Ext)                                       │
  193.  │       │ └──────────────────────────────────────────────┘
  194.  │       │ ┌──────────────────────────────────────────────┐
  195.  │       ├─┤ drw_hline                                 68 │
  196.  │       │ │  (Ext)                                       │
  197.  │       │ └──────────────────────────────────────────────┘
  198.  │       │ ┌──────────────────────────────────────────────┐
  199.  │       ├─┤ scr_change_foreground                     68 │
  200.  │       │ │  (Ext)                                       │
  201.  │       │ └──────────────────────────────────────────────┘
  202.  │       │ ┌──────────────────────────────────────────────┐
  203.  │       ├─┤ drw_vline                                 68 │
  204.  │       │ │  (Ext)                                       │
  205.  │       │ └──────────────────────────────────────────────┘
  206.  │       │ ┌──────────────────────────────────────────────┐
  207.  │       └─┤ drw_vline                                 68 │
  208.  │         │  (Ext)                                       │
  209.  │         └──────────────────────────────────────────────┘
  210.  │ ┌──────────────────────────────────────────────┐
  211.  ├─┤ win_title                                 30 │
  212.  │ │  88: 168 cy / 168 cy   33 µsec /  33 µsec    │
  213.  │ │ 286:  78 cy /  78 cy 7800 nsec /7800 nsec    │
  214.  │ │ 386:  65 cy /  65 cy 3250 nsec /3250 nsec    │
  215.  │ └─┬────────────────────────────────────────────┘
  216.  │   │ ┌──────────────────────────────────────────────┐
  217.  │   ├─┤ scr_fill_screen                           30 │
  218.  │   │ │  (Ext)                                       │
  219.  │   │ └──────────────────────────────────────────────┘
  220.  │   │ ┌──────────────────────────────────────────────┐
  221.  │   ├─┤ str_len                                   30 │
  222.  │   │ │  (Ext)                                       │
  223.  │   │ └──────────────────────────────────────────────┘
  224.  │   │ ┌──────────────────────────────────────────────┐
  225.  │   └─┤ scr_display_string                        30 │
  226.  │     │  (Ext)                                       │
  227.  │     └──────────────────────────────────────────────┘
  228.  │ ┌──────────────────────────────────────────────┐
  229.  └─┤ win_display_area                          28 │
  230.    │  (dup)                                       │
  231.    └──────────────────────────────────────────────┘
  232.